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This publication provides a general introduction to the 
use, operation, and installation of APL\360. APL\360 
is a conversational time-shared terminal system utilizing 
APL (A Programming Language), a concise notation 
which makes use of well known mathematical symbols, 
plus a number of symbols that are used for designating 
other simple and powerful functions. Because APL 
is closely related to mathematical notation, and its 
functions operate on sets of information as well as in- 
dividual data items, the user can write effectively in 
this language with a minimum of instruction. 

APL\360 is designed to operate under either (a) 
the IBM System/360 Operating System (OS/360), 
Multiprogramming with a Fixed Number of Tasks 
(MFT with subtasking) or Multiprogramming with 
a Variable Number of Tasks (MVT) or (b) the IBM 
System/360 Disk Operating System (DOS/360). 

The manual is in three parts: 

Part I describes APL\360 as viewed by a user 
at a typewriter-like terminal. The statements and 
commands used to describe the operations to be 
performed by the APL\360 System are summarized. 

Part II describes APL\360 as viewed from the 
central data processing system location. The system 
features which facilitate the management and 
operation of an APL\360 System are summarized. 

Part III describes the items to be considered in 
planning for the installation of an APL\360 System. 
Minimum machine requirements and storage require- 
ments are provided. 



1"C 




Second Edition (December 1970) 

This edition applies to Version 1, Modification Level 0, of the program products 
APIX360-OS (5734-XM6) and APL\360-DOS (5736-XM6) and to all subsequent versions 
and modifications until otherwise indicated in new editions or Technical Newsletters. 

Changes are continually made to the information herein. Therefore, before using this 
publication, consult the latest System/360 SRL Newsletter (GN20-0360) for the editions 
that are applicable and current. 

Copies of this and other IBM publications can be obtained through IBM branch offices. 

A form has been provided at the back of this publication for readers' comments. If this 
form has been removed, address comments to: IBM Corporation, Technical Publications 
Department, 1133 Westchester Avenue, White Plains, New York 10604. 

©Copyright International Business Machines Corporation 1970 



CONTENTS 



INTRODUCTION 1 

APL\360: A Programming Language 1 

Some Characteristics of APL 1 

Concise Notation , 1 

Easy Interpretation of APL Statements '. '. 2 

Handling of Numbers and Tables 2 

.User-Defined Functions 3 

Wide Spectrum of Applications '.'.'. 3 

The Implementation of APL\360 4 

Characteristics of the APL\360 Program Products. . . '. '. 4 

PART I: THE USER'S VIEW OF APL\360 6 

The APL\360 System ." q 

APL\360 Organization 6 

Locks, Keys, and Security. 8 

APL Primitive Functions 9 

Execution Mode and User Defined Functions 18 

Using APL\360 23 

Entries from the Keyboard 23 

The APL Character Set. ] ] 23 

User Terminal Equipment 24 

A Brief Description of the APL\360 Functions 2 4 

Standard Scalar Functions 24 

Generalized Matrix Operations, 26 

Generalized Reduction 26 

Compression and Expansion 26 

Other Functions 27 

Symbols Having Special Uses 28 

A Brief Description of APL\360 29 

Classification of Commands [ 29 

System and Program Information . 32 

PART II: OPERATING APL\360 34 

Introduction ! ! ! ! 34 

The Recording Terminal [ 34 

Privileged System Commands 35 

Operator's Workspace [ 35 

APL\360 Offline Utility Program. . [ \ 37 

PART III: INSTALLATION PLANNING 39 

Introduction 39 

System Configuration 39 

Minimum System Requirements — APL\360-OS 40 

Minimum System Requirements — APL\360-DOS 40 

Terminals 41 



Storage Estimates ^ 

Parameters • **^ 

Estimating Core *J° 

Estimating Swap Extent 4 ° 

Estimating Minimum Library Disk Storage 47 

Functionally Restricting APIA360 to Require Less Than 

The Minimum Specified Partition/Region Size ...... 47 

Priorities in a Multiprogramming Environment 4 8 

Performance • » 4 ^ 

APPENDIX A: SAMPLE TERMINAL SESSION 50 

BIBLIOGRAPHY 64 



XI 



INTRODUCTION 



APIA360; A PROGRAMMING LANGUAGE 

The APL Program Products presented here consist of computer 
programs to interpret and execute procedures written in APL. 
Thus, there are two separate aspects which will be distinguish- 
ed throughout this manual : 

• The formal language: APL 

• An implementation: APL\360 

SOME CHARACTERISTICS OF APL 

APL is a developing language based on a notation defined by 
K. E. Iverson and published in 1962 in his book entitled A 
Programming Language . The objective was to take a fresh start 
in defining procedures in both data processing and computation 
from the problem definition point of view, rather than basing 
it on a current state of computer technology. 

The result is a very concise language which makes generous 
use of symbols for specifying operations, and which allows 
complex procedures to be defined with a minimum number of 
characters or keystrokes. 

CONCISE NOTATION 

The concise notation promotes ease of learning and exploits 
the use of well known mathematical symbols: 

ADD + 
SUBTRACT 

MULTIPLY x 

DIVIDE t 

and extends these to logical functions and relations : 

AND a 

OR v 

EQUAL TO 

NOT EQUAL TO * 



LESS THAN K 
GREATER THAN > 

It also defines a number of special symbols used in other 
functions. One of these, the left arrow (-<-), is used for as- 
signing a value. For example, 

A <- 5 

means assign 5 to A. Another special symbol, the right arrow 
(-»•), is used to effect branching to a statement. For example, 

-+ B 

means branch to the statement labelled B. 

Because of APL's close correspondence to mathematical nota- 
tion, a user will be able to write in this language with a 
minimum of instruction. 



EASY INTERPRETATION OF APL STATEMENTS 

The rules of reading an APL statement are simple. All the 
functions have the same priority — there are no complex hier- 
archy rules. Special sequences of functions can be handled 
with parentheses in an obvious way. Thus, the value of C in 

C-<-5 + (2x4) + 4 

is 17. Functions are executed from right to left, except as 
indicated by the parentheses . Non-programmers adapt very 
quickly to the rules of APL. Moreover, experienced program- 
mers soon overcome their early confusion when they can lay 
aside the hierachy rules of other languages . 



HANDLING OF NUMBERS AND TABLES 

APL functions handle sets of numbers and tables (matrices) 
as well as single numbers. Thus, 

3 + 12 7 4 15 

results in the set of numbers 

15 10 7 18 
Consider another example: 

PAYMENT •*■ QUANTITY x PRICE 



where QUANTITY could consist of the quantities of hundreds of 
items, PRICE the hundreds of corresponding prices. The result 
is a set of hundreds of numbers for the corresponding payments, 
APL therefore avoids many of the programmed "loops" of other 
languages which handle one number at a time. 



USER-DEFINED FUNCTIONS 

Whenever a program is written in APL, it becomes a defined 
function so that its name can be used in the same way in which 
the basic symbols such as + - x * are used. For example: 

A *■ 3 x (5x4*2) 

means that A will take on the value of 30 , which is 3 times 
the area of a triangle (one half the height of 5 times the 
base length of 4). Another way to write this is: 

A «- 3 x (5 TRIAREA 4) 

where TRIAREA is the name of a program that calculates the 
area of a triangle. In this example A would be set to 30, 
which would be 3 times the area of a triangle which has a 
height of 5 and a base length of 4 . 

Thus, in APL each program extends the set of functions 
available in the language for that user. This has powerful 
implications for interactive computing and for implementing 
problem oriented languages . 



WIDE SPECTRUM OF APPLICATIONS 

Although APL is based on a mathematical notation, it can 
also be used to describe data processing procedures. In fact, 
it demonstrates how mathematics, including logical facility, 
can encompass all data processing including "commercial appli- 
cations". Much of this data processing consists of handling 
groups of numbers or tables of data, which is precisely where 
APL excels . 

APL can also handle sets of characters in the same way it 
processes sets of numbers. A set of characters is otherwise 
known as alphabetic text. Hence there are many popular 
applications of APL in information retrieval, text editing, 
budget control, financial analysis, forecasting, and comput- 
er assisted instruction. 



THE IMPLEMENTATION OF APIA360 

The language described above could be implemented in many 
different ways ranging from batch processing to time-sharing. 
These program products are an implementation based on interac- 
tive use at multiple terminals connected to a single central 
processing unit. 

CHARACTERISTICS OF THE APL\360 PROGRAM PRODUCTS 

Each user can regard his terminal as an APL computer with 
its own memory. This memory is called the active workspace 
and contains both programs and data. This active workspace 
can be stored in the libraries in the central computer. Sim- 
ilarly, a workspace can be loaded from the libraries into the 
active workspace. 

Each user controls the operation of libraries and workspaces 
with simple commands. APL is supplemented by commands for such 
operations as signing on and off, loading and saving workspaces, 
dropping workspaces from the library, or erasing programs and 
data in the active workspace. 

There are only two modes of operation: 

• The normal or execution mode in which statements or ex- 
pressions are entered and immediately executed. This 
implicitly provides a "desk calculator mode" in which the 
full power of the APL language is available, including any 
predefined programs in the active workspace. 

• Program definition mode in which programs are written 
statement-by- statement and provided with program names. 
This mode includes a powerful editing facility for adding, 
deleting, or changing statements. 

These program products implement the concept of "visual 
fidelity". This means that each line entered is interpreted 
as it appears on the printed page regardless of the sequence 
in which the individual characters may have been entered. This 
feature helps to build confidence, makes reconstructing events 
easy, and is particularly useful in tutorial situations. 

There are two APL\360 program products. One is for instal- 
lations using DOS/360 and the other for installations using 
OS/360. The DOS version can also be set up in a dedicated 
mode or run under Control Program-67 (CP-67) on a System/360 
Model 67. However, the terminal user is oblivious to which 
version he is connected to; the APL commands and functions he 
uses are the same. 



The security protection in the APIA 360 System is an import- 
ant consideration, and is implemented on four levels: 

• Each user is given an account number and can add his own 
password to his assigned number. He can change this pass- 
word any time he chooses. The identification number as 
well as the current password is necessary in order to sign 
on. 



• 



• 



Only the user who stored a given workspace in the libraries 
can modify or drop that workspace. 

A password may be assigned to each workspace stored in the 
libraries, and it may be changed at any time. No one can 
access a Workspace which has a password without entering 
the current password along with the workspace name. 

Programs within a workspace may be "locked". This means 
that anyone who can access that workspace can execute the 
locked programs but cannot list the statements that con- 
stitute the program. This facility is useful in computer 
assisted instruction and whenever an author wishes to keep 
his code proprietary. Once a program is locked, it can- 
not be unlocked. 



PART I: THE USER'S VIEW OF APIA 360 



THE APIA 360 SYSTEM 



APIA 360 ORGANIZATION 



Workspaces 

The APIA 3 60 System executes system commands and APL state- 
ments entered by a user on a terminal typewriter. Commands 
allow the user to control the general environment. APL state- 
ments are used to perform computation and other work (see 
Example 1 ) . 



APIA 360 SYSTEM COMMANDS 



)0FF 

) ERASE A 

)SAVE 



APIA 360 STATEMENTS 
(with answers shown) 



25 



20+40*8 



4x 2 



Example 1 . Commands and statements 

The APIA 360 System is built on the notion of a workspace . 
When the terminal user signs on the system, he is given a 
workspace, part of which is set aside to serve the internal 
workings of the system; the remainder is used, as required, 
for storing data, programs, and transient information gener- 
ated in the course of a computation. 

When in use, a workspace is said to be active , and it oc- 
cupies a block of working storage in the central computer. 
The size of the block, which determines the capacity of each 
workspace in the system, is set at a fixed value by the cen- 
tral installation. 

Inactive workspaces are stored in libraries, where they are 
identified by names supplied by the user. They occupy space 
in secondary storage facilities of the central computer and 



cannot be used directly. When required, a copy of a stored 
workspace in a library can be made active , or selected infor- 
mation may be copied from them into an active workspace. 

Libraries 

Libraries in APL\360 are either private or public . Private 
libraries are associated with individual users of the system, 
and are identified by the user's account number. As will be 
seen later, private libraries are protected against unauthor- 
ized usage. Public libraries are not associated with an in- 
dividual user and may be accessed by any user of the system. 



COMMAND 


MEANING 


)SAVE AVERS 
)LOAD AVERS 
)LOAD 1 NEWS 


Naming and saving a work- 
space. 

Loading a workspace from 
the user's library. 

Loading a workspace from 
public library #1. 



Example 2. Library commands 



Control of Workspaces and Libraries 

The APL\360 System commands are used to control these work- 
spaces and libraries. In addition to the commands involving 
signing on and off, there are commands to clear workspaces, to 
load workspaces from the library, to copy parts of one work- 
space into another, to erase parts of or entire workspaces, 
and to save and lock workspaces. Another group of commands 
is used to inquire into the state of workspaces: to list the 
names of workspaces in libraries, to list names of defined 
functions and variables, and names of groups of variables and 
functions in the workspaces. Messages may be sent from one 
user to another, or to the computer operator. 



In general, APIA 360 commands fall into five categories: 

• Signing on and off the system 

• Controlling the state of the active workspace 

• Saving or dropping workspaces in the library 

• Asking for reports on the contents of workspaces and 
libraries 

• Sending messages to the computer operator or to other 
terminal users 

A complete list of APL\360 system commands is given at the 
end of Part I . 

LOCKS, KEYS, AND SECURITY 

The need for adequate data and program protection is in- 
creased in the time-sharing environment where multiple users 
are simultaneously using the system. Each user's programs and 
data must be protected against accidental destruction by other 
users. Confidential data must be safeguarded against unauth- 
orized access. 

Stored workspaces and the information they hold can be pro- 
tected against unauthorized use by associating a lock, com- 
prising a colon and a password of the user's choice, with the 
name of the workspace when the workspace is saved. In order 
to activate a locked workspace or to copy any information it 
contains, a colon and the password must again be used, as a 
key , in conjunction with the workspace name. Since listings 
of workspace names, including those in public libraries, never 
reveal the keys and do not overtly indicate the existence of a 
lock, added protection is ensured. 

Account numbers can be similarly protected by locks and keys, 
thus maintaining the security of a user's private library and 
avoiding unauthorized charges against his account. 

Passwords for locks and keys may be formed of any sequence 
of alphabetic and numeric characters without blanks. Charac- 
ters beyond the eighth are ignored. In use as either a lock 
or key, a password follows the number or name it is protecting, 
from which it is set off by a colon. 



The APIA 360 System offers four levels of security to the 
user: 

• The user account number to which the user can attach his 
own password. 

• User control over his own libraries: only he can modify 
or drop a workspace from his own library. 

• A password, which may be assigned to each workspace as it 
is saved into the library. No one can access this work- 
space without knowing the associated password. 

• Locking of individual function definitions within a work- 
space. This means that the program can be used, but can- 
not be listed or modified. 



APL PRIMITIVE FUNCTIONS 

APL is easy to start using since it makes use of much stand- 
ard mathematical notation. Using the system in execution mode, 
so that calculations are performed immediately and answers 
printed, is simple; however, very powerful APL functions can 
be used. For example, to sort a string of numbers into des- 
cending sequence, the string is entered and then sorted using 
the GRADE DOWN function of APL: 

N+7 259346812 

12 98765432 

or, if the user wants the numbers in ascending sequence, GRADE 
UP may be used: 

2 34 5 678912 
Many of the APL functions will be familiar to users: 
+ PLUS 
- MINUS 
x TIMES 
4 DIVIDE 
< LESS THAN 
<: LESS THAN OR EQUAL TO 



=? EQUAL TO 

£ GREATER THAN OR EQUAL TO 

> GREATER THAN 

* NOT EQUAL TO 

In addition, there are many that are easy to use, even for 
those who have no mathematical background. For example: 

F MAXIMUM 

L MINIMUM 

There are, in addition to the functions listed above, many 
other powerful APL functions. For example, there are the log 
and natural log, trigonometric functions and their inverses, 
combinatorial, factorial, logic operators, and many others. 
APL functions are described under the heading "A Brief Descrip- 
tion of the APL Functions". 

Manipulation of Numbers 

APL functions may be used with numbers : 

5 + 4 
9 

8 

or with sets of numbers where the operation is performed on 
each element in the set. For example: 

5 + h 2 7 3 (Add 5 to each element) 
9 7 12 8 

12x34 (Multiply corresponding elements) 

3 8 

2 7 5=777 (Indicate equal corresponding ele- 
10 ments by a one) 

One of APL's most powerful features is this ability to handle 
lists of numbers (vectors) or tables (matrices and arrays) with 
many of the same functions used with single numbers. 

Most of the APL symbols are used with two arguments, a left- 
hand and a right-hand argument. Note in the examples below 
that these arguments may be groups of numbers : 

10 



23 



(Where in 7 5 23 is the first 
occurrence of 5? 
ans : in position 2) 



3*2 
9 



(Take the first 3 elements from 
the vector on right) 



Many symbols can also be used with one argument: 



i5 

3 4 



(Generate the integers from 
1 to 5) 



12 3 4 5 
Manipulation of Character Strings 

APL can also work on character strings. Some examples of 
manipulation of alphabetic data are shown in Examples 3A, 3B , 
and 3C . 



Problem : Enter names and print them in a list. (Note 
that in our example blanks must be added to 
make all the names the same length, 8 char- 
acters . ) 

Method 1 Execution mode (See Example 4D) 

4 8 p 'HOPKINS CROCKER FLOOD STANFORD' 
HOPKINS (Enter the string of char- 

CROCKER acters enclosed in quotation 

FLOOD marks. Rearrange to print 4 

STANFORD rows of 8 characters each.) 



Example 3A. Manipulating alphabetic information 



Problem ; Sort an alphabetic string 

S+'RTODESBA' (Enter the string of 

A-r ' AB CDEFGHIJKLMNOPQRSTUVWXYZ ' characters . ) 



SlkAxSl 

ABDEORST 



(Rearrange each char- 
acter of S to the or- 
der in which it 
appears in A.) 



Example 3B. Using APL with alphabetic data 
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Problem: How many A's are in ABRACADABRA? 



+/'A'='ABRACADABBA 1 



(Generate a 1 for every letter 
equal to A, then add all the 
1 's.) 



Example 3C. Using APL with alphabetic data 



Manipulation of Arrays 

APL gets much of its power and simplicity from the way it 
handles arrays. Basic operations which apply to single values 
can be applied with equal ease to the processing of vectors, 
matrices, and entire arrays. In APIA 360 there is no limit to 
the number of dimensions that an array can have. 

In addition to the scalar functions that apply to arrays, 
element-by-element, there are many other functions that make 
array handling easy. Some examples of array manipulation are 
shown below j 



1 

4 



4 
1 



ABCD 
EFGH 
IJKL 



A+2 3 pi6 

A 
2 3 
5 6 

B«-2 3p4 2 7 1 5 8 

B 
2 7 
5 8 

X+3 HpiABCDEFGHIJKL' 
X 



Entering and printing arrays 

Generate the numbers 1 to 6 
and rearrange into 2 rows of 
3 columns 



Rearrange the numbers on the 
right into 2 rows of 3 col- 
umns 



Rearrange the letters enclosed 
in quotation marks into 3 rows 
of 4 columns 
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A 
12 3 
4 5 6 

B 
4 2 7 
15 8 

A+B 
5 4 10 

5 10 14 Scalar functions are applied 

element-by-element. 

A*B 
4 4 21 
4 25 48 

A=B 
10 
10 

A>B 

10 



+ /LHA 

5 7 9 

+/121A 

6 15 

Reduction can be applied to 
T/[2]B arrays over the dimension 

7 8 specified in the brackets. 

*/ 11 1A 
4 10 18 

Note: If no dimension is specified, the 
*/A last dimension is assumed. Hence, 
6 12 ° */A is equivalent to x/L2]A in this example, 



4 2 7 15 8 



4 2 
7 1 

5 8 



C<-3 2pB Shapes of arrays may be 

C changed . 
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Arrays may be catenated. 

[]<-R<-3 4pii2 Enter R and S and display. 
12 3 4 
5 6 7 8 
9 10 11 12 

0<-S«-3 4p427158327649 

4 2 7 1 

5 8 3 2 
7 6 4 9 

R S 




R t S 
12344271 
56785832 
9 10 11 12 7 6 4 9 


12 3 4 
5 6 7 8 
3 10 11 12 


4 2 7 1 

5 8 3 2 
7 6 4 9 












J?,[1]S 
12 3 4 
5 6 7 8 
9 10 11 12 

4 2 7 1 

5 8 3 2 
7 6 4 9 


R 




S 
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Arrays may be laminated. 



i?,t.5]S 
1 2 3 4 
5 6 7 8 
9 10 11 12 



4 
5 
7 



2 
8 
6 



7 1 

3 2 

4 9 




1 
4 

5 
5 

9 
7 



/?,[1.5]5 
2 3 4 
2 7 1 



6 
8 

10 
6 



7 
3 

11 
4 



8 
2 

12 

9 




i?,[2.5]S 

1 4 

2 2 

3 7 

4 1 



5 
6 
7 
8 

9 
10 
11 
12 



3 
2 

7 
6 
4 
9 




Note: The .5 in these three examples 
has no special significance; the same 
results would be obtained if the 5 
were any digit from 1 to 9. 
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N+l 


2 


3 


4 




No . 


xN 






1 


2 


3 


4 


5 


2 


4 


6 


8 


10 


3 


6 


9 


12 


15 


4 


8 


12 


16 


20 


5 


10 


15 


20 


25 



Multiplication tables 
may be produced using 
the outer product. 

(Any of the other scalar 
operators that use two 
arguments can be used in 
place of the x) . 



1 
4 



A 
2 3 

5 6 



The inner product can be 
used to find the familiar 
matrix product . 



4 
7 
5 



2 

1 



A+ ,*C 
33 28 

81 61 



(Any of the other scalar 
operators that use two 
arguments can be used in 
place of the + and x) . 





1 





1/A 


1 


3 






4 


6 








1 





1 1\A 


1 





2 


3 


4 





5 


6 




1 





l\[lLi 


1 


2 


3 















4 


5 


6 





Arrays may be compressed 



or expanded. 



1 1 1 1\X 



A BCD 
E FGH 
I JKL 
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J[l;2] 
B[2;3] 



1 4 



12 3 



LXeTT 



BCD A 

FGHE 
JKLI 



IJKL 
ABCD 
EFGH 



4>x 



l4>* 



24>C1]Z 



es?vi 



1 4 

2 5 

3 6 



2 3 



Af-f-2 2 pi 2 3 1 
F-t-8 3 



Specific parts of arrays 
may be selected. 



Arrays may be reversed 



or rotated. 



Arrays may be transposed. 



Simultaneous linear equa- 
tions i 

x+2y=8 
3x- y=3 
may be solved by using the 
matrix of coefficients and 
vector of constants. 
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EXECUTION MODE AND USER-DEFINED FUNCTIONS 

The APIA360 System operates in either of two user-selected 
modes; execution mode where statements are executed when they 
are entered (Example 4A) and definition mode where statements 
are entered and stored in the active workspace as part of a 
user-defined function. 



APL STATEMENT 


MEANING 


2x3 
6 


2 times 3 


A<-2 

B<-3 

A* B 
8 


2 raised to the 3rd nov.ei 


25*. 5 
5 


square root of 25 


10®100 
2 


log of 100 to the base 10 


+/3 5 2 4 
14 


the sum of 3, 5, 2, and 4 



Example 4A. Sample APL statements in execution mode 

Example 4B illustrates function definition. The defined 
function (or program, as it is sometimes called) starts with 
a V and is given a name, GRADES in this case. The APL state- 
ments for solving the problem are written, and the function 
definition is ended by typing the V. The defined function is 
not executed until the user signals the system by typing the 
name of the function. Notice that the function can be used 
over and over again to solve for different groups of values. 
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Problem: 


Find the average of a 
Arrange the grades in 


group of grades . 
descending sequence. 


Function 


definition: 








Enter 


V GRADES 






Meaning 

Open definition and 
name it 


[1] 


(+/ff)*pG 






Sum of all values in G 
divided by number of 
values in G 


[2] 


GL1G1 






Arrange G in descending 
order of G 


[3] 


V 






Close definition 


Execute 










G+10 80 90 
GRADES 


70 


90 


user 
enters 


86 
100 


90 90 80 

G+17 30 40 
GRADES 


70 




APL 
responds 

user 
enters 


29 

40 30 17 






APL 
responds 



Example 4B. Function definition and repeated execution 

Example 4C is another example of a defined function. In 
order to describe the answers printed during execution, des- 
criptive information is included in the function definition. 
This information is identified by quotation marks. Notice 
that when the function is executed, the text prints without 
the quotation marks. The computations done in Example 4C for 
Team 1 (computations for Team 2 are done similarly) are dis- 
cussed below: 



+ /T1 



Add all the scores for Team 1 

|"/T1 means find the maximum 
value (maximum number of runs 
in any one inning) for T1 
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Tl i Rl 



Which position in the scores 
for Team 1 (which inning) did 
the maximum number of runs 
occur? 



Problem: BASEBALL 










Find ■ 


the final score and biggest 


inning 


for each team. 




Team 1 


1 


2 







3 2 5 


Team 2 





1 




2 


13 


Function Definition 












V BSEBL 


Note: 




Scores are entered at 


Cl] 


Tl+U 






execution time. 


[23 


T2+Q 










C3] 


'FINAL SCORE: ' ;+ 


/Tl;' TO 


' i+/T2 




[4] 


' TEAM1 : RUNS IN 


BIGGEST 


INNING 


• ;R1 + UT1 


[5] 


t 


INNING 


NUMBER 


' ;T1\R1 


[6] 


'TEAM 2: RUNS IN 


BIGGEST 


INNING 


•;i?2-(-r/2 , 2 


C7] 


t 


INNING 


NUMBER 


1 -,T2\R2 


[83 


■+1 










[93 


V 
BSEBL 










Q: 


010203250 










0: 


000121300 










FINAL 


SCORE: 13 TO 7 










TEAM1 


: RUNS IN BIGGEST 


INNING 


5 








INNING 


NUMBER 


8 


Answers print with 


TEAM 2 


: RUNS IN BIGGEST 


INNING 


3 


messages. 




INNING 


NUMBER 


7 






0: 








APL 
set 


waits for next 
of team scores. 




->• 






Enter right arrow 










to 


snd execution. 



Example 4C. Identifying answers 
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Example 4D is another example of a function definition in 
which the manipulation of characters takes place, rather than 
computations with numbers. The example shows one method of 
entering variable length alphabetic information. In this 
case, the length of names entered is restricted to eight char- 
acters or fewer. After execution, the names can be arranged 
to print in a list. 



Problem ; Enter names and list them. (Note that in this 
example blanks must be added to make all the 
names the same length, eight characters.) 

Method: Use the TAKE function (+) to get blanks added 
automatically . 



CI] 
C2] 
[3] 
£4] 
[5] 



V NAMES 
N<-\0 

IN+&iB 

N+N,IN 

+ 2 

V 



NAMES 
HOPKINS 
CROCKER 
FLOOD 
STANFORD 



N 



HOPKINS CROCKER FLOOD STANFORD 

4 8 pN 
HOPKINS 
CROCKER 
FLOOD 
STANFORD 



Meaning 

Make N an empty vector. 

Take 8 characters. Pad 

with blanks or truncate 

if necessary. 

Add into string N. 

Go to step 2 and repeat. 



Type backspace U 
backspace T to end 
execution. 
Display the string. 

Rearrange to print 4 
rows of 8 characters 
each. 



Example 4D. Entering alphabetic information 
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One of the powers of APL is its concise notation. This 
is illustrated in example 4E, which shows how the solution 
in 4D can be entered in a more concise form without altering 
any logic: 





V NAMES 


[1] 


N<-\0 


C2] 


tf+ff,8+[BV 


[3] 


+ 2V 



Example 4E. Entering alphabetic information 

When an APL statement is executed, it may employ primitive 
functions (for example, + - x *) or defined functions to pro- 
cess data. When a defined function is thus referenced, each 
statement in that function is executed and may, in turn, em- 
ploy primitive functions and any defined functions in the 
active workspace (Example 5) . 



Problem : Print average and test scores in descending 
order. Change scores to percent, average 
again, and print in descending order. 



Function definition 



CI] 
[2] 
[3] 
[4] 



V PRCNT 
GRADES 
G+100xGiT 
GRADES 

V 



Meaning 



Use function GRADES (Example 
4B) to compute average and 
rearrange. Change to per- 
cent: Divide score by total 
possible and multiply by 100. 
Use GRADES to compute aver- 
age and rearrange . 



£-<-40 30 50 35 45 38 42 Enter scores, total possible, 



40 
50 
80 
100 



T+5 
PRCNT 

45 42 40 38 35 



30 



90 84 80 76 70 60 



and PRCNT. 

GRADES prints average and 
rearranges scores. 
GRADES prints percent aver- 
age and rearranges percent 
scores . 



Example 5. An APL statement employing a defined function. 
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USING APIA 360 



ENTRIES FROM THE KEYBOARD 

After a connection is established, normal communi cation 
between a terminal and the central computer is carried on by 
means of entries from the typewriter keyboard, which alter- 
nately locks and unlocks as each entry is made and the com- 
puter completes its work. The general procedure is to type 
an instruction or command, then strike the carrier return to 
indicate the end of the line. (On some terminals a transmis- 
sion signal must also be sent.) 

Errors in typing a line can be corrected before the carrier 
return is struck. 

In addition to correcting errors as they occur, APL allows 
the user to display and to make corrections, changes, and 
additions to existing function definitions. Lines can be in- 
serted into or added to the end of the function. Whole lines 
can be replaced, or specific characters within a line can be 
changed or inserted, 

THE APL CHARACTER SET 

The APL\360 keyboard is shown in Figure 1. The numerals, 
alphabetic characters, and the comma, colon, semi-colon, and 
period appear in the standard typewriter keyboard positions. 
Alphabetic characters are always entered when the keyboard is 
in the lower case position, i.e. not shifted, although they 
print as upper case italics. Upper case is used to enter most 
APL special characters. 



MAR 
REL 




i 


2 


< 

3 


< 

4 


5 


> 

6 


> 

7 


* 
8 


V 

9 


A 

o 


_ 
+ 


• 
— 

X 


BACK 
SPACE 


ATTN 


CLR 
SET 




TAB 


Q 




e 
E 


P 
R 


T 


Y 


U 


I 


o 
o 


* 


•*- 




ON 
OFF 


LOCK 


a 

A 


r 
s 


L 
V 


F 


V 


A 
H 




J 


i 
K 


u 

L 


( 

c 


) 


RETURN 


SHIFT 

J 


c 


3 

x 


n 
c 


u 

y 


± 
B 


T 


1 
M 


• 


: 


\ 


SHIFT 



APL\360 KEYBOARD 



Figure 1 . APL keyboard 
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The part numbers of APL printing elements are given in 
Part III. However, any printing element could be used with 
the APL system, since the encoded characters generated by the 
keyboard and transmitted to the computer are independent of 
the particular element mounted on the terminal. The trans- 
mitted information will be interpreted according to the APL 
keyboard characters. 

The visual interpretation of APL expressions require an 
APL printing element. However, other printing elements are 
frequently useful in conjunction with special-purpose APL 
programs designed to exploit their character sets. Also, any 
element that matches the keyboard encoding (SELECTRIC ® or 
PTTC/BCD) of the terminal can be used for straightforward 
numerical work, since letters and digits print properly with 
such elements. 

USER TERMINAL EQUIPMENT 

The terminal used with the APL\360 System must be an IBM 
2 741 Communications Terminal, an IBM 2 7 40-1 Communications 
Terminal equipped with the Transmit Control feature, or an 
IBM 1050 Data Communications System. It may connect to the 
central computer through the dial-up telephone network, by 
a leased telephone line, or by private wire. 

A BRIEF DESCRIPTION OF THE APL FUNCTIONS 

The following descriptions are included to illustrate the 
variety of functions available in APL. Detailed descriptions 
are provided in the APL\360 User's Manual . 

STANDARD SCALAR FUNCTIONS 

The following functions return a scalar result when their 
arguments are scalars. They may also be applied on an element- 
by-element basis to arrays of any rank, provided either that 
where the functions have two arguments, both arguments have the 
same rank and the same length in every dimension, or that at 
least one argument has only one element. Any of the scalar 
functions with two arguments may be used in reduction, or in 
the generalized inner and outer products. 

X+Y X plus Y 

Note: Functions with two arguments are 

+J Y (no change) called dyadic functions. Those with 

only one argument are called monadic 
X-Y X minus Y functions. 
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-Y Minus Y 

X*Y X times Y 

xY Signum of Y 

X*Y X divided by Y 

vj Reciprocal of Y 

X*Y X to the Yth power 

*Y e to the Yth power 

X[Y Maximum of X and Y 

Tl Ceiling of Y (next integer > Y) 

XlY Minimum of X and Y 

IY Floor of Y (next integer ^ Y) 

X\Y X residue of Y 

I Y Absolute value of Y 

X®Y Log of Y to the base X 

©J Natural log of Y 

XoY Trigonometric functions and inverse trigonometric 
functions 

OY PI times Y 

XlY Number of combinations of Y things taken X at a time 

!J Y factorial; Gamma of Y-1 

?Y Random equi -probable selection of an integer from 
1 to Y 

X<Y X less than Y 

X^Y X less than or equal to Y 

X=Y X equals Y 

X>. Y X greater than or equal to Y 

X>Y X greater than Y 
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X*Y X not equal to Y 

ZM X and Y 

Xv¥ X or Y 

X»Y Neither X nor Y (X NOR Y) 

XnY Not both X and Y (X NAND Y) 

~Y Not Y 

GENERALIZED MATRIX OPERATIONS 

In the entries below, the symbol © (not an APL svmbol) has 
been used to indicate any standard scalar dyadic function. 

X+ . *Y Ordinary matrix product of X and Y 

Z®.@Y Generalized inner product of X and Y 

X° ,&Y Generalized outer product of X and Y 

GENERALIZED REDUCTION 

&/Y The reduction along the last dimension of Y 
o/LZlY The reduction along the Zth dimension of Y 
o/Y The reduction along the first dimension of Y 

COMPRESSION AND EXPANSION 

X/Y X (logical) compressing along the last dimension 
of Y 

X/LZlY X (logical) compressing along the Zth dimension 
Of Y 

X/Y X (logical) compressing along the first dimension 
of Y 

X\Y X (logical) expanding along the last dimension 
of Y 

X\[_Z1Y X (logical) expanding along the Zth dimension 
of Y 
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X\Y X (logical) expanding along the first dimension 
of Y 



OTHER FUNCTIONS 

XpY Reshape Y to have dimension X 

pY Dimension of Y 

J [7] The elements of X at locations Y 

X\Y Locations of Y within vector X 

\Y The first Y consective integers (follow index origin) 

XeY Which elements of X are members of Y? 

Xrl Representation of Y in number system X 

XiY Value of the representation Y in number system X 

X$>Y Rotation by X along the last dimension of Y 

XblZlY Rotation by X along the Zth dimension of Y 

XeY Rotation by X along the first dimension of Y 

4>Y Reversal along the last dimension of Y 

<J)[Z]J Reversal along the Zth dimension of Y 

eY Reversal along the first dimension of Y 

X§Y Transpose by X of the coordinates of Y 

$Y Ordinary transpose of Y (transposing last two coor- 
dinates only) 

X ,Y Y catenated to X 

X,[Z]Y Y catenated to X on the Zth coordinate, or lamin- 
ations of X and Y 

,Y Ravel of Y (make Y a vector) 

X+Y Take the first X (or last -X) elements of Y 

X\Y Drop the first X (or last -X) elements of Y 
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X+Y X specified by Y: the name X receives the value of 

Y 
X?Y X integers taken without replacement from Y 

iX Grade up of X 

yx Grade down of X 

W*A Inversion of Matrix A 

BEA Solution of simultaneous linear equations where A 
is the coefficient matrix and B is the vector of 
constants 

SYMBOLS HAVING SPECIAL USES 

The following symbols are not functions , but may be used in 
APL with the sense indicated below: 

(. ) Parentheses. Expression within them is to be 

evaluated before being used as the argument of an 
operator or defined function. 

■+X Branch to X. When X is a scalar, branch to X; when 
X is a vector, branch to the first element of X ; 
when X is an empty vector, go to the next line in 
sequence (do not branch) ; when X is (or any in- 
valid line number) exit the function. 

Q<-X Print the value of X. 

X<-U Request input. Value of X is the resulting value 
after expression entered is evaluated. 

X+B Request input. Value of X is entire input text 
as literal characters , up to but not including 
carrier return. 

'ZJZ' The literal characters XYZ. 

a Comment. Precedes an unexecuted line of comments. 

D Illegal character having the special property of 
halting a request for literal input. Formed by 
typing backspace U backspace T, carriage return. 

v Used to open and close function definition. 

^ Used to lock a function definition. 
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CD] Used to print function when in definition mode. 
A BRIEF DESCRIPTION OF APL\360 SYSTEM COMMANDS 

CLASSIFICATION OF COMMANDS 

System commands and APL operations are distinguished func- 
tionally by the fact that system commands can be called for 
only by individual entries from the keyboard, and cannot be 
executed dynamically as part of a defined function. They are 
distinguished in form by the requirement that system commands 
be prefixed by a right parenthesis . 

It may be desirable to exert some system control dynamic- 
ally, and some items of system information can be profitably 
used during the execution of a program. For these purposes, 
APIA 360 provides functions which can be used like other APL 
operations. These functions are described at the end of this 
section. 

All system commands can be executed when the terminal is 
in the execution mode , in which APL operations are executed 
immediately upon entry. However, in definition mode , in which 
sequences of operations are being composed into functions for 
later execution, commands which call for storing a copy of 
the workspace, or which might otherwise interfere with the 
definition process itself, are not permitted. 

System commands are conveniently grouped into five classes 
with regard to their effect upon the state of the system: 

• Terminal control commands affect the relation of a ter- 
minal to the system. 

• Workspace control commands affect the state of the active 
workspace. 

• Library control commands affect the state of the libraries, 

• inquiry commands provide information without affecting the 
state of the system. 

• Communication commands affect the transmission of messages 
among the terminals . 

Notes on the following commands: 

• Items in brackets are optional. 
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key or lock: a password. 

wsname: library number and workspace name, or workspace 
name alone, as required. 



Terminal Control 
) number [:key] 

) OFF [ : lock] 
)OFF HOLD [ :lock] 

) CONTINUE [:lock] 

) CONTINUE HOLD [:lock] 



Sign on designated user and 
start a work session. 

End work session. 

End work session and hold dial- 
up connection. 

End work session and store 
active workspaces . 

End work session, store active 
workspace, and hold dial-up 
connection. 



Workspace Control 

) CLEAR 

) LOAD wsname [ :key] 

) COPY wsname [ :key] name 

) COPY wsname [ :key] 

)PCOPY wsname [:key] name 

)PCOPY wsname [ :key] 

) GROUP names 
) ERASE names 
) ORIGIN or 1 



Activate a clear workspace. 

Activate a copy of a stored 
workspace. 

Copy a global object from a 
stored workspace. 

Copy all global objects from a 
stored workspace. 

Copy a global object from a 
stored workspace, protecting 
active workspace. 

Copy all global objects from a 
stored workspace, protecting 
active workspace. 

Gather objects into a group. 

Erase global objects. 

Set index origin for array 
operations. 
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) DIGITS 1 to 16 

) WIDTH 30 to 1 30 
) WSID wsname 



Set maximum for significant 
digits in output. 

Set maximum for an output line . 

Change active workspace identi- 
fication . 



Library Control 

)SAVE 

) SA VE wsname [ : lock] 

) DROP wsname 

Inquiry 
)FNS [letter] 
)VARS [letter] 
)GRPS [letter] 
) GRP name 

)SI 

)SIV 

) WSID 

) LIB [number] 

) PORTS 

) PORTS code 



Save a copy of active workspace 
using its current name. 

Save a copy of the active work- 
space assigning a new name. 

Erase a stored workspace. 



List names of defined functions, 

List names of global variables. 

List names of groups. 

List membership of designated 
group. 

List halted functions (state 
indicator) , 

List halted functions and asso- 
ciated local variables (aug- 
mented state indicator) . 

Give identification of active 
workspace 

List names of workspaces in the 
specified library. 

List ports in use and codes of 
connected users. 

List port numbers .associated 
with designated user code. 
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Communications 

)MSGE port [text] Address text to designated 

port. No reply expected. 

)MSG port [text] Address text to designated port 

and lock sender's keyboard. Reply 
expected. 

} OPRN [text] Address text to recording ter- 

minal (APL Operator). No re- 
ply expected. 

) OPR [text] Address text to recording ter- 

minal (APL Operator) , and lock 
sender's keyboard. Reply expected. 

SYSTEM AND PROGRAM INFORMATION 

APIA 360 permits access to several items of information con- 
cerning the status of programs in the user's workspace and the 
status of the APL system. These are called I-beam functions; 
the I-beam symbol i is formed by overstriking x and t . The 
following I-beam functions are currently available to users: 

119 Cumulative keyboard-unlocked time since sign-on in 
6 0ths of a second 

120 Time of day in 60ths of a second since 00:00 on date 
given by 125 

121 Compute time since sign-on in 60ths of a second 

122 The amount, in bytes , of unused space remaining in 
user's workspace 

12 3 The number of users currently signed on 

I2M- Connect time since sign-on in 60ths of a second 

12 5 Date on which the system was initiated 

126 The number of the line of the function currently being 
executed 

127 A vector containing the line numbers of all functions 
whose. execution has been started but not yet completed, 
with the most recent function first 
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12 8 A code indicating the terminal device being used 
12 9 User sign-on number 
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PART II: OPERATING APIA360 



INTRODUCTION 

Special functions and privileged commands are provided for 
use by the operations staff to control system resources. 
Through these commands, the system operator can, for example, 
install or remove users, broadcast messages to all users, 
determine user status, and delete a public library from the 
system. Operator dialog with the system is achieved through 
the means of a recording terminal. These and other support 
features are discussed below. 



THE RECORDING TERMINAL 

As connections with remote user terminals are established 
or broken, and users commence or terminate work sessions, a 
printed log of these events is generated at a system device 
called the recording terminal. The recording terminal, which 
is usually but not necessarily located at the central computer 
site, is ordinarily attended by an APIA 360 System operator who 
monitors the operation of the system, and provides a common 
point of contact for all users. 

There are certain supervisory functions, essential to the 
operation of APL\360, which can be effected from the re- 
cording terminal. Thus, this terminal holds a privileged 
position relative to user terminals. The enrollment of 
new users to an installation and the allocation of library 
space are two examples of this kind of function. 

A terminal signed on with a special operator number auto- 
matically becomes a recording terminal. It behaves in the 
same way as a user terminal with the following exceptions: 

• Its keyboard is normally locked. The system operator 
must first signal attention before a keyboard entry can 
by typed. When the keyboard is normally locked, output 
interrupted by an attention signal is retransmitted. 

« It receives messages such as sign-ons and sign-offs gen- 
erated by APL users. 

• It is always privileged and can perform system management 
functions not generally available to terminal users. 
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Other users can sign on only if the recording terminal is 
signed on and its keyboard is locked. 



PRIVILEGED SYSTEM COMMANDS 

The following privileged system commands are supplied for 
use by the system operator: 



)ADD 



) DELETE 

)HI 

)PA 

)HIPA 

)LOCK 
) UN LOCK 



Enroll a new terminal user, create a public 
library, or change a previously enrolled 
user's name, account number lock, workspace 
quota, or CPU time limit. 

Remove a public library or user account 
number from the system and drop all work- 
spaces in the corresponding library. 

Prepare a message to be delivered to each 
terminal user as he signs on. 

Send a public address message to all ter- 
minal users currently signed on. 

Prepare combined sign on and public address 
message. 

Prevent a user from signing on. 

Reinstate a previously locked-out user. 



OPERATOR'S WORKSPACE 

In addition to the full capabilities of APL, the system op- 
erator is supplied with a workspace (called OPFNS) which con- 
tains a collection of APL\360 functions for controlling the 
online system. In general, operator functions will often be 
invoked in combination with APL expressions and with each 
other. Table 1 summarizes the special operator functions. 



35 



Table 1. Summary of APL\360 Special Operator Functions 



Function 


Description 


•XX' 


4tf 'XX' 


Hexadecimal addition * 




ALL 


Returns all ports in system 


VP1 


AND VP2 


Returns intersection of ports 




BOUNCE VP 


Bounce ports VP 




DEFUSE VP 


Defuse ports VP 




DEFUSED 


Returns defused ports 




DEPRIVILEGE VP 


Deprivilege users at ports VP 




DISPLAY 'XX' 


Display 4 bytes starting at XX * 


'YY' 


DISPLV 'XX' 


Display YY bytes starting at XX * 




DOWN 


Returns disabled ports 




DTE N 


Decimal to hex conversion * 


VP1 


EXCEPT VP2 


Returns combination of ports 




EXPRESS 


Returns express ports 




FREE 


Reports free phone numbers 




HTD 'XX' 


Hex to decimal conversion * 




INITIALIZE 


Initialize OPFNS workspace * 




KB LOCK VP 


Keyboard lock ports VP 




KBUNLK VP 


Keyboard unlock ports VP 




LIMIT VP 


Make ports VP express 




MAP 


Display control section (CSECT) map. 




MPXAD 'XX' 


Returns port number of MPX address XX 




NOT VP 


Returns ports not specified 




OFF 


Returns ports signed off 




ON 


Returns ports signed on 


VP1 


OR VP2 


Returns union of ports 


'XX' 


PATCH 'YY' 


Patches location XX to value YY * ** 




PAW AIT 


Returns ports which have not received PA 




PHONE VI 


Returns port numbers of phones VI 




PORT VP 


Reports brief port information 




PORTS VP 


Reports detailed port information 




PRIORITY A,B 


Adjust multiprogramming priority 




PRIVILEGE VP 


Privilege users at ports VP 




PRIVILEGED 


Returns privileged ports 




SETLIMIT N 


Sets express time limit 


'XX* 


SH 'XX' 


Hexadecimal subtraction * 




SHOWHI 


Shows HI message 




SHOW LIMIT 


Shows express time limit 




SHOWPA 


Shows last PA message 




SHUTDOWN 


Initiate system shutdown 




SUSPECT 


Returns idle ports 




■UN LIMIT VP 


De -express express ports 




USER VI 


Returns ports for user account numbers 




USER 'ABC 1 


Returns ports for designated user code 


: 1 x x ' 


VERIFY 'YY' 


Verify contents of location XX * 


*Th 


is function not n 


equired for normal operation . 


**Th 


is function can c 


ause system failure if misused. 
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APIA360 OFFLINE UTILITY PROGRAM 

APL\360 provides the installation with a comprehensive util- 
ity program for the maintenance of user libraries. The utility 
is run as an ordinary batch job. Examples of typical utility 
operations include the following: 

• Formatting of disk packs 

• Backup of user library on tape or disk 

• Verification of disk and tape readability 

• Retrieval of individual workspaces or libraries from 
backup copies 

• Reallocation of APL\360 library to conform with changed 
disk extent boundaries 

• Write selected workspaces onto tape for transmission to 
another APL\360 installation 

Provision is also made for the incorporation of installa- 
tion-written billing routines. These routines may be added 
to the utility program, if billing of users is required, either 
during system generation time or at some later time. Table 2 
summarizes all utility operations. 
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Table 2. Summary of APL\360 Utility Operations 



Operation 


Para- 


Optional 


Kay Run 


Disk or 


Purpose and 


Name 


meter 


Listing 


with APL 


Tape I/O 


Remarks 


ACCTG 





ws* 


Yes 


Disk 


Lists users (0) 




1 


names 






and, optionally, 
ws names (1 ) . 


BILLING 


None 


None 


No 


Disk 


Produces billing 
information using 
installation- 
defined routines. 


CREATE 


None 


ws names 
written 
on disk 


No 


Both 


Special-purpose 
form of RESTORE 
for SYSGEN. 


DISKFMT 


Library 

extent 

number 


None 


No 


Disk 


Writes full-track 
records on a 
library extent. 


DUMP 


Tape 


ws names 


No 


Both 


Writes all direc- 




record 


written 






tories and work- 




length 


on tape 






spaces to tape. 


INCDUMP 


Tape 


ws names 


No 


Both 


Writes all direc- 




record 


written 






tories and recent- 




length 


on tape 






ly saved ws to 
tape. 


RESTORE 


None 


ws names 
written 
on disk 


No 


Both 


Writes directories 
and workspaces 
from tape to 
library disk. 


RETRIEVE 


None 


ws names 
written 
on disk 


No 


Both 


Searches dump 
tape for selected 
ws and adds them 
to library. 


SELDUMP 


Tape 


ws names 


Yes 


Both 


Writes selected 




record 


written 






workspaces to 




length 


on tape 






tape. 


SELREST 


None 


ws names 
written 
on disk 


No 


Both 


Adds all work- 
spaces on tape 
to library. 


TESTBILL 


None 


None 


Yes 


Disk 


Like BILLING, but 
no accounting 
reset. 


TVERIFY 


None 


ws names 
on tape 


Yes 


Tape 


Readback check of 
dump tape. 


VERIFY 


Library 
extent 

number 


None 


Yes 


Disk 


Readback check of 
library extent. 


WSDUMP 


None 


None 


Yes 


None 


Prints SNAP dumps 
of damaged WS on 
WSDUMP data set. 


WSLIST 


None 


None 


Yes 


None 


Makes other 
operations list 
ws names. 


* Worksp 


ace (s) 
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PART III; INSTALLATION PLANNING 



INTRODUCTION 

This section is intended to aid the systems manager, sys- 
tems analyst, systems programmer, and other responsible per- 
sonnel in planning for the installation and implementation of 
the APLX360 System. The following aspects are discussed: 

• System configuration 

• Terminal features 

• Storage estimates 

• Priorities in a multiprogramming environment 

• Performance 

The user is advised that with APL\360, as with other sys- 
tems, attention should be given to preinstallation systems 
analysis and design, and communications requirements. 

SYSTEM CONFIGURATION 

APL\360 operates as a problem program under the control of 
either the IBM System/360 Operating System (OS/360) Multipro- 
gramming with a Fixed Number of Tasks (MFT with subtasking) 
or Multiprogramming with a Variable Number of Tasks (MVT) ; or 
the IBM System/360 Disk Operating System (DOS/360). 

Both APL\360-OS (5734-XM6) and APL\360-DOS (5736-XM6) are 
functionally equivalent except for the internal interface with 
the host system and for the specific operating procedure at 
the central computer location. 

The selection of hardware configuration for either version 
of APLX360 is largely dependent upon the total system require- 
ments of a user installation— that is, by the requirements of 
OS/360 or DOS/360, APLX360, and the application demands of the 
specific in-house installation. Minimum requirements for both 
APL\360-OS and APLX360-DOS are described below, and are sum- 
marized in Table 3. 
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MINIMUM SYSTEM REQUIREMENTS—APIA 36 0-OS 

APIA360-OS is structured to support the following minimum 
devices for online operation: 

• One IBM System/360, at least Model 20 50HG for OS/360 (MVT) 
or Model 20 40H for OS/360 (MFT with subtasking) , with a 
minimum partition or region size of 170K bytes (based upon 
maintaining two 36,000-byte workspaces core resident). By 
functionally restricting the APIA360-OS System, the OS/360 
(MFT/MVT) partition or region may be reduced to approxi- 
mately 128K bytes. This subject is described more fully 
later in this section. 

• One Selector Channel 

One IBM 2311 Disk Storage Drive or one disk storage module 
on an IBM 2314 Direct Access Storage Facility 

• One IBM 2701 Data Adapter Unit, or one 2702 or 2703 Trans- 
mission Control Unit (2702 or 2703 is recommended since 
2701 does not allow interruption of terminal output) 

• One IBM 2400-series nine-track Magnetic Tape Unit 

• One IBM 2740-1 with receive-interrupt RPQ or one IBM 2741 
Communication Terminal, or one IBM 1050 Data Communica- 
tions System containing at least one IBM 1052 Printer- 
Keyboard for use as a recording terminal 

• Universal Instruction Set 

• Storage Protection 

• Interval Timer 

MINIMUM SYSTEM REQUIREMENTS — APIA360-DOS 

APIA360-DOS is structured to support the same minimum de- 
vices for online operation as those listed for APIA360-OS with 
the exception of the CPU. For APIA360-DOS, the minimum pro- 
cessor is the IBM System/360, Model 2040GF with a minimum par- 
tition size of 170K bytes (based upon maintaining two 36,000- 
byte workspaces core resident) . 

By functionally restricting the APIA360-DOS System, the 
DOS/360 partition may be reduced to approximately 128K bytes. 
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A standalone variation of the APL\360-DOS System with a 
core storage requirement approximately equal to the DOS/360 
partition size requirement may be generated from the distrib- 
uted system. All other requirements remain as stipulated above, 

A variation of the standalone version of the APL\360 System 
may be generated from the distributed system, which allows for 
minor variations between a real System/360 and the virtual 
System/360 provided by Control Program-67 (CP-67) . The re- 
quirements of the virtual machine provided by CP-67 are ident- 
ical to those required for the standalone version of APL\360 
plus 480 bytes per port. 



Table 3. Summary of APL\360 Minimum System Requirements 



SYSTEM TYPE 


APL\360-DOS 


APL\360-OS 


STANDALONE 


DOS 


MFT 


MVT 


CPU* 


MODEL 
2040GF 


MODEL 
2040H 


MODEL 
2050HG 


PARTITION/ 
REGION SIZE** 


170K BYTES 


CPU 
FEATURES 


INTERVAL TIMER 

UNIVERSAL INSTRUCTION SET 

ONE SELECTOR CHANNEL 


DASD 


ONE 2311 OR ONE 2314 STORAGE MODULE 


TAPE 


ONE 2 400 -SERIES 9 -TRACK 


TRANSMISSION 

CONTROL 

UNIT 


ONE 2701 , 2702, OR 2703 


♦Minimum based on estimated APLA360 and host system 
storage requirements. 

**Based on maintaining two 36,000-byte workspaces core 
resident. See also "Storage Estimates". 



TERMINALS 

APL\360 provides terminal handling programs for the follow- 
ing terminals : 
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• IBM 2741 Communications Terminal 

• IBM 2 740 Communications Terminal, Model 1 

• IBM 1050 Data Communications System 

Tables 4, 5, and 6 supply the required, recommended, and 
optional features for these terminals. 



Table 4, 



IBM 2 741 Communications Terminal Features 



FEATURE 


NUMBER 


PREREQUISITES 


REMARKS 


Receive Interrupt** 


4708 




Recommended 


Typamatic Keys 


8341 




Recommended 


Modems : 




Data Set: 


Required 


Dial Up*** 


3255 


WE 10 3A2* 




Data Set Attach- 








ment 


9114 


WE 103A2* 




Data Set Attach- 








ment 


9115 


WE 103F2* 




IBM Line Adapter 


46nn 


Fixed 
Connection 




Keys, APL Keyboard**** 


RPQ M40174 




Recommended 


PTTC/BCD 






P/N 5195500 


Standard 








SELECTRIC 






P/N 5156576 


APL Printing 








Element: 






Recommended 


PTTC/BCD 


RPQ F24235 




P/N 1167988 


Standard 








SELECTRIC 


RPQ E62267 




P/N 1167987 


Character Spacing, 








10/in. 


9104 




Recommended 


Line Feeding , 








6/in. 


9435 




Recommended 


Pin Feed Platen 


9509 




Optional 


Voltage 


988n 




Required 


Transmit Interrupt 


7900 




Ignored 


Print Inhibit 


5501 




Ignored 


*Or equivalent. 




**Use of this feature 


requires Feature No. 8055 (2741 break 


feature) or Feature 


No. 8200, Type 1 Terminal Interrupt 


Feature, on the 2 70 


2 or 2703. Required companion feature 


not available on 27 


01 . 


Feature required if 


used as the recording terminal. 


♦♦♦Required only if us 


ed on switched network (dial-up) . 


****Existing keyboards 


can be modified by pasting APL 


characters on the k 


eytops (Order APL Characters, 


GX20-1783). 
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Table 5. IBM 2740 Communications Terminal, Model 1, Features 



FEATURE 



Automatic EOB 
Record Checking 
Transmit Control 
Receive Interrupt** 
Modems : 

Dial Up*** 
Data Set Attach- 
ment 
Data Set Attach- 
ment 
IBM Line Adapter 
Keys, APL Keyboard**** 
PTTC/BCD 
Standard 
SELECTRIC 
APL Printing 
Element: 
PTTC/BCD 
Standard 
SELECTRIC 
Character Spacing, 

10/in. 
Line Feeding, 

6 /in. 
Pin Feed Platen 
Voltage 
2260 Attachment 



NUMBER 



1313 
6114 
8028 
RPQ F17913 

3255 

9114 

9115 
46nn 
RPQ M40174 



PREREQUISITES 



RPQ F2 42 35 

RPQ E62267 

9104 

9435 
9509 
988n 
8301 



#6114 
#3255 

Data Set WE 10 3A2* 

Data Set WE 103A2* 

Data Set WE 10 3F2* 
Fixed Connection 



REMARKS 



Re c ommeh de d 

Recommended 

Optional 

Recommended 

Required 



Recommended 
P/N 5195500 

P/N 5156576 

Recommended 
P/N 1167988 

P/N 1167987 

Recommended 

Recommended 
Optional 
Required 
Prohibited 



*Or equivalent. 
**Required companion feature not available on 2701. 
Feature required if used as the recording terminal. 
♦♦♦Required only if used on switched network (dial-up) . 
****Existing keyboards can be modified by pasting the 
APL characters on the keytops (Order APL Characters, 
GX20-1783) . 
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Table 6, 



IBM 10 50 Data Communications System Features 



FEATURE 



NUMBER 



1051 Control Unit 
Automatic EOB 
Receive Interrrupt** 
Text Time-Out Suppress, 
Automatic Ribbon Shift 
Modem : 

Data Set Attachment 
Data Set Attachment 
IBM Line Adapter 

First Printer Attach. 

Second Printer Attach. 

Card Punch Attachment 

First Punch Attachment 

Second Punch Attach. 

First Reader Attach. 

Second Reader Attach. 

Keyboard Request 

Line Correction 

Line Correc. Release 

Blower 

Forms Stand Stacker 

I/O Component Table 

Typing Table 

Voltage 

Automatic EOB 

1052 Printer-Keyboard*** 
Acceler. Carrier Ret. 
APL Printing Element: 

PTTC/BCD 
Char. Spacing, 10/in. 
Line Feeding, 6/in. 
Cable Exit 
Pin Feed Platen 

1053 Printer 

Acceler. Carrier Ret. 
APL Printing Element: 

PTTC/BCD 
Char. Spacing, 10/in. 
Line Feeding, 6/in. 
Pin Feed Platen 
1051 Paper Tape Reader 

1055 Paper Tape Punch 

1056 Card Reader 
Extended Char. Reading 

1057 Card Punch 
Extended Char. Punch 
Operator Panel 
Voltage 



Mod 1 or 2 
RPQ E28235 
6100 
9698 
1295 



9114 

9115 

46nn 

4408 

6381 

1635 

4410 

6383 

4411 

6384 

4770 

4795 

4796 

9030 

4450 

4632 

9705 

988n 

1313 

Mod 1 

1006 



PREREQUISITES 



REMARKS 



Data Set WE 103A2* 
Data Set WE 103F2* 
Fixed Connection 



or 2 



RPQ F24235 

9104 

9435 

902n 

9509 

Model 1 

1006 

RPQ F24235 
9104 
9435 
9509 
Model 1 
Model 1 
Model 1 
3861 
Model 1 
3860 
5478 
988n 



#904n 



#6381 on 1051 



#4411/6384 on 1051 
#4410/6383 on 1051 
#4411/6384 on 1051 

#4410/6383 on 1051 
#1635 on 1051 



Required 

Recommended 

Recommended 

Recommended 

Recommended 

Required 



Required 

Optional 

Optional 

Optional 

Optional 

Optional 

Optional 

Optional 

Optional 

Optional 

Optional 

Optional 

Optional 

Recommended 

Required 

Prohibited 

Required 

Recommended 

Recommended 

P/W 1167988 

Recommended 

Recommended 

Required 

Optional 

Optional 

Recommended 

Recommended 

P/N 1167988 

Recommended 

Recommended 

Optional 

Optional 

Optional 

Optional 

Required 

Optional 

Required 

Recommended 

Required 



* Or equivalent 
** Required companion feature not available on J/ui. 

Feature required if used as a recording terminal. 
***Existing keyboards can be modified by pasting APL 

characters on the keytops (Order APL Characters, 

GX20-1783) . 
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STORAGE ESTIMATES 

The amount of core and disk storage required by APL\360 
depends upon several installation-related options and/or the 
configuration of the specific machine upon which APIA 360 is to 
be run. Three primary storage requirements should be esti- 
mated in planning any APIA 360 installation: 

• The main core storage (APLCORE) required for the APIA 360 
supervisor, interpreter, active workspaces in core, ter- 
minal buffers , and control information 

• The size in cylinders (SWAPEXT) of the contiguous single- 
extent data set used to contain swapped-out workspaces 

• The minimum size in cylinders (LIBEXT) of the first or only 
contiguous single-extent data set used for containing lib- 
rary directories and workspaces. All library extents must 
be on the same device type, although the Library and Swap 
devices may differ. 



PARAMETERS 



The following parameters are used in estimating APIA360 
storage requirements : 



• (SDISK) 

• (LDISK) 

• (PORTS) 

• (WSSIZE) 



(INCORE) 



The number of tracks per cylinder on the direct 
access device (10 for the IBM 2311, 20 for the 
IBM 2314) used for the Swap Extent. 

The number of tracks per cylinder on the direct 
access device used for the Library Extent. 

The number of transmission control unit ports, 
including gaps within a control unit, used for 
APL\360. 

The number of bytes per workspace in the system. 
The standard size workspace is 36,000 bytes, but 
this may be specified by the installation to be 
as small as 20,480 or as large as 21,600 times 
the smaller of SDISK or LDISK. 

The number of areas of core storage reserved for 
active workspaces when APL\360 is running. IN- 
CORE must be at least 2. Experience gained 
under APL\360-DOS indicates that on a System/360, 
Model 50, the performance improvement achieved 
by increasing INCORE from 2 to 3 is not particu- 
larly significant until the number of ports on 
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the system exceeds 20. When the number of ports 
passes 50, a fourth INCORE area is recommended. 

(DIRS) The number of user directories in the APIA360 

library. These directories contain the account 
number, name, billing information, and pointers 
to the saved workspaces of all enrolled users. 
The size of a directory is identical to that of 
a workspace. Directory capacity is directly pro- 
portional to the specified workspace size. With 
standard size workspaces (36,000 bytes), each 
directory has capacity for about 150 accounts. 



ESTIMATING CORE 

The core storage estimate is the sum of: 

• 88,000 bytes for the APIA 3 60 supervisor, interpreter, and 
control information 

• 336 bytes for each port 

• The number of workspaces in core times 8 plus the work- 
spaces size rounded up to a 2K boundary as follows: 

APLCORE<-880 0+(336xPORTS)+INCOREx8 + 20H-8*fWSSIZEi20^8 

ESTIMATING SWAP EXTENT 

The Swap Extent must contain enough space to handle one 
workspace for every APL port on the system plus room for three 
extra workspaces. The size of the Swap Extent is determined 
by first calculating the number of full tracks required to 
contain a workspace by dividing the number of bytes in a work- 
space by the number of bytes per track and rounding up to the 
next whole track: 

STRK<-\'WSSIZE*362 .kxSDISK 

Then, if the number of tracks (STRK) is not less than . one 
cylinder (SDISK) , the Swap Extent is the number of whole cyl- 
inder per workspace, times 3 plus the number of ports: 

SWAPEXTHPORTS+ 3 ) x f STRK* SDISK 

Otherwise, the Swap Extent is 3 plus the number of ports 
divided by the number of whole workspaces per cylinder rounded 
to the next whole cylinder: 
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SWAPEXT+ r ( PORTS +3 ) * ISDISKiSTRK 

It is advisable to provide one or two extra workspace areas 
in the Swap Extent since a flagged bad track in a workspace 
swap area causes the entire set of tracks allocated to that 
workspace to be abandoned. This allowance can be made in the 
above formulas by increasing the 3 to a 4 or 5 . 

ESTIMATING MINIMUM LIBRARY DISK STORAGE 

The minimum size library extent provides disk storage for 
primary and alternate copies of the directories. Additional 
disk storage must, however, be provided for workspaces saved 
in the library. This extra space may be supplied by increas- 
ing library extent and/or providing additional library ex- 
tents. The amount of disk storage needed to save a single 
workspace varies from one 2314 disk track or two 2311 disk 
tracks up to the maximum number of tracks required to contain 
a full workspace. This variability results from the fact that 
only the meaningful contents of a workspace are stored on disk 
when it is saved in a user's library. 

An average of approximately 400 36,000-byte workspaces can 
be contained on a 1316 disk pack and about 1600 on a 2316 disk 

jpclCK • 

The minimum size of library extent (the first or only 
library extent) is determined by first computing the number of 
whole tracks required to contain a workspace: 

LTRK+lWSSIZEi 36 2. HxLDISK 

Then, the minimum size of library extent is 2 times the num- 
ber of directories times the number of tracks per workspace, 
plus one additional track per directory if a workspace occu- 
pies a number of tracks that is an integral number of cylin- 
ders : J 

LIBEXT+[ ( DIRS* ( 2 *LTRK )+0=LDISK | LTRK)±LDISK 

FUNCTIONALLY RESTRICING APL\360 TO REQUIRE LESS THAN THE MIN- 
IMUM SPECIFIED PARTITION/REGION SIZE 

Several avenues of approach may be used by the installation 
systems programmer to reduce the APL\360 core storage require- 
ments : ^ 

• Reduce workspace size from 36,000 to a minimum of 20,4 80 
bytes. (This will limit capacity of workspaces and direc- 
tories. ) 
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• Remove tables from the APL supervisor used to accumulate 
operational statistics. 

• Reduce the IODEBUG parameter to 1 for APL system genera- 
tion. 

• Reduce the number of APL ports . 

Some combination of the above may be used to reduce the 
partition or region size to approximately 12 8K. 

Caution: Library workspaces provided as part of APL\360-DOS 
and APL\360-OS may not work on a functionally re- 
stricted system. 

PRIORITIES IN A MULTIPROGRAMMING ENVIRONMENT 

When APL\360 is operating in a multiprogramming environment 
under OS/360 or DOS/360, it ensures that other partitions or 
regions receive frequent CPU service by alternating its own 
priority between high and low. Thus, when APL\360 has low 
priority, the other partitions or regions will receive CPU 
time if they are not quiescent. 

The nominal proportion of time during which APL\360 has 
high priority is controlled by two system parameters, preset 
in the distributed svstem to fifty percent, but modifiable at 
any time by the APIA 360 System operator. The two parameters 
specify the proportion of APL\360 high-priority time when no 
ports are in use, and when all ports are in use. This pro- 
portion varies approximately linearly with the number of ports 
in use. 

Unless the APL\360 System and some other partition or re- 
gion require heavy CPU service, the priority setting will have 
little or no effect on overall system behavior. 



PERFORMANCE 

When operating in a multiprogramming environment, perform- 
ance is primarily controlled by the user as specified under 
"Priorities in a Multiprogramming Environment". 

The apparent performance of APL\360 at a terminal is pri- 
marily dependent upon: 

• The speed of the CPU, core storage, and DASD used 

• The priority setting specified above 

48 



• The number of workspaces core resident (installation 
option) 

• The number of active terminals 

• The specific work being done by the user 

The apparent performance is normally measured in terms of 
reaction time, that is, the length of time for the system to 
respond to a trivial request (carrier return to start of 
printing) . 

When APIA360 is operating, the APL supervisor collects 
statistics that are available to "privileged" terminal users. 
These statistics may be utilized by the user to determine the 
performance of the APIA 360 System in any operational environ- 
ment. 
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APPENDIX A; SAMPLE TERMINAL SESSION 



)1776 

010) 19.32.36 07/03/68 JANET 



A P L \ 3 6 



Entry automatically indented. 
12 Response not indented. 

X is assigned value of the 
expression. 



12 

7 

1 .44 



3x4 

X 

Y*-~5 

X+Y 

144£~2 



Pxp 



CATS 



10 



3+4x5+6 



16 
24 



X<-3 
Jf-4 

(Xxy)+4 
Zxy+4 



FUNDAMENTALS 



Value of X typed out. 
Negative sign for negative 
constants. 



Exponential form of constant. 



-P"*" 1 2 3 4 Four-element vector. 



Functions apply element-by- 



1 ^ 9 16 element, 

_ PxY _ _ Scalar applies to all elements 

.5 10 15 20 

!+■' CATS' Character constant (4-element 



Q vector) 

YZ+-5 Multi -character names. 

JZ1+-5 
YZ+YZ1 



v attention. 

+ 5 + 6 



Correction by backspace and 



Executed from right to left. 
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X I 
SYNTAX ERROR 
X I 

A 

XI 
VALUE ERROR 
XI 

A 



20.4- 

12 

24 



4X3T5.1 

(4-x3)T5.1 

4-xTS.l 

X«-l5 

3 4-5 
10 



I+5-X 

I 
4-3210 

X[I 
4- 3 3 4- 5 

X<I 
110 

Ol 
3. 14-1592654- 

OtI 2 
3.14-1592654- 1.570796327 

A>4-5 9 

OIU80 
0.7853981634- 1.570796327 

lOl 
0. 84-14-70984-8 

201 2 
0.54-03023059 "0.4-1614-6 836 5 

301 
1 . 5574-07725 

~301 
0. 7853981634- 

30~30i7 
12 3 4 5 6 7 

1+1 2 

4-OJ 
1.4-14-213562 2.236067977 

OOiY 
0.8660254-038 



Entry of invalid expression. 
Shows type of error committed. 
Retypes invalid statement with 

caret where execution stopped. 
Multi-character name (not X 

times Y) . 
XY had not been assigned a value, 

SCALAR FUNCTIONS 

Dyadic maximum (two arguments). 



Monadic ceiling (one argument) 
Index generator function. 



Empty vector 

prints as a blank line. 
All scalar functions extend 

to vectors . 



Relations produce 

logical (0 or 1) results, 
Pi times 1 . 

Pi divided by 1 2 

Conversion of X to radians, 

Sin 1 

Cos 1 2 

Tan 1 

Arctan 1 

Tan Arctan 12 3 4 5 6 7 

(1+Y*2)*.5 

(1 -reciprocal of Y*2)*.5 
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7oi 2 Tanh 1 2 

0.761594156 0.9640275801 

70701 2 Arc tanh Tanh 1 2 

1 2 

DEFINED FUNCTIONS 

VZ+-X F Y Header (2 args and result) . 

Cl] Z-f-( (Z*2 )+Y*2 )*. 5 Function body. 

[2] V Close of definition. 

3 P 4 Execution of dyadic function F. 

5 

P«-7 

Q«-(P+l)P P-l Use of F with expressions as 
Q arguments. 



4x3 F 4 



10 
20 

VB-+-G A G is the signura function. 

[1] B+(A>0)-A<0 A and B are local variables. 

[2] v 

G 4 
1 

{? "6 
"1 

X+ 6 

1 

Vtf A Like G but has no explicit re- 

El] P*-(A>0)-A<0 suit. P is a global variable. 

C2] V_ 

H 6 
P 

~1 

I+H 6 H has no explicit result and 
VALUE ERROR hence produces a value error 

Y+-H ~6 when used to right of assign- 

a ment . 

VZ+FAC N;I FAC is the factorial function. 

[1] Z-r\ 

[2] l-«-o 

[3] L±:I-*-I+l L1 becomes 3 at close of def. 

[4] -K *i I>N Branch to (out) or to next. 

[5] Z+Zxl 

[6] +L1 Branch to L1 (that is, 3). 

C7] V 

FAC 3 
6 

FAC 5 
120 
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T&FAC+-3 5 Set trace on lines 3 and 5 of 

X+FAC 3 FAC. 

*V1C[3 3 1 Trace of FAC. 

FACiSl 1 

F4CC3] 2 
i^C[5] 2 
F4C[3] 3 
FAClSl 6 
Fj4C[3] 4 

TLFAC+-Q Reset trace control. 

MECHANICS OF 
FUNCTION DEFINITION 

M Greatest common divisor function 

based on the Euclidean algo- 
rithm. 

Correction of line 1 . 
Resume with line 4. 
Display line 1 . 

Display entire GCD function. 





VG+M GCD 


[1] 


G*-H 


12] 


M+M I N 


C3] 


-*-4xA/*0- 


C4] 


C 1 ] G+M 


[2] 


[4]/N-G 


[5] 


[10] 


CI] 


G+M 


Cl] 


[U] 


V 


G+M GCD N 


Cl] 


G+-M 


[2] 


M*-M | // 


[3] 


->4xA/^o 


[4] 


N+G 


V 




C5] 


•+1 


C6] 


V 




3 6 GCD 44 


4 






VGCD 


[6] 


[4.1]Af,tf 


[4.2] 


CD] 


V 


G+M GCD N 


Cl] 


G+M 


C2] 


M+M | N 


[3] 


-»-4xA/*0 


[4] 


N+G 


[4.1] 


M,N 


[53 


->1 


V 




[6] 


V 




36 GCD i+U 


8 36 




4 8 




4 





Close of display, not definition. 

Enter line 5 . 

Close of definition. 

Use of GCD. 

4 is GCD of 36 and 44. 

Reopen def. (Use V and name only). 

Insert between 4 and 5. 

Display entire function. 



Fraction stays until close of 

definition. 
End of display. 
Close of definition. 

Iterations printed by line 5 

(was line 4.1). 
Final result. 
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VGCZ?CLJ]V 
V G+M GCD 11 
[ 1 ] G+M 

C 2 ] M+M I // 

[3] ->UxA/*o 

[ 4 ] tf «-G 

[5] M,N 

C6] + 1 

V 

VG'CZ) 
[7] [5] 
v 



Reopen, display, and close GCD, 



Line numbers have been reassign- 
ed as integers . 
Close (Even number of V ' s in all), 
Reopen definition of GCD. 
Delete line 5 by using attention. 



[6] 

Cl] 
[2] 
Cl] 

[1] 

[2] 

120 



VZ+ABC X 

Z«-(3 3x£+(tfx5 )-6 

C1U9] 

Z«-(33x£ + (i?x5)-6 

/ 1 /l 
Z-*-(3xQ)+(2'x5)-6 

V 
FAC 5 



) ERASE FAC 
FAC 5 
SYNTAX ERROR 
FAC 5 

A 

VZ+BIN U 
[1] LA:Z+(Z,Q)+0,Z 
[2] -»-L/iX^>pZV 

BJ// 3 
VALUE ERROR 
BINlllLA:Z*-(Z t 0)+0,Z 

A 

Zf-1 

+1 

13 3 1 
#17/ 4 

74Li/£' ff/?J?0fl 
SIil?Cl]Li4:Z"«-(Z,0)+0,Z 

A 

)5'I 
BlffCl] * 
-*1 

14 6 4 1 



Close definition. 

A function to show line editing. 

A line to be corrected. 

Initiate edit of line 1 . 

Types line , stops ball under 9 . 

Slash deletes, digit inserts. 

Ball stops at first new space. 

Then enter the ) and the T. 
FAC still defined. 

Erase function FAC. 

Function FAC no longer exists. 



An (erroneous) function for 
binomial coefficients. 



Suspended execution. 

Assign value to Z . 

Resume execution. 

Binomial coefficients of order 3, 

Same error (local variable Z 
does not retain its value) . 

Insert line to initialize Z. 
Display state indicator. 
Suspended on line 1 of BIN. 
Resume execution (BIN now cor- 
rect) . 
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V Z+BIN N 

[13 z«-i 

[2] LA:Z+(Z,0)+0,Z 
[3] -+LA*N>pZ 
V 

SABIN+-2 

Q+BIN 3 

5J^[2] 



BINL21 



+ 2 



BIN121 



Cl] 
C2] 
[3] 
[>] 
[5] 
[6] 
C7] 

2 

D: 



10 



->o 



VMULTDRILL N;Y;X 

Y+?N 

Y 

X+Q 

■+0xxX='S' 

■+\X = */Y 

'WRONG, TRY AGAIN' 

+3V 

MU LTD RILL 12 12 
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WRONG, TRY AGAIN 
Q: 

20 
6 7 
D: 

•S» 

VZ+ENTERTEXT 
Cl] Z+" 
[2] P-cpZ 
C3] Z«-Z,Q 
[4] -*2x£*pZ 
C5] V 



Display revised function and 
close definition. 



Set stop on line 2. 
Execute BIN. 

Stop due to stop control. 
Display current value of Z. 

Resume execution. 

Stop again on next iteration. 
Resume. 

Stop again. 

Branch to (terminate) . 

INPUT AND OUTPUT 

A multiplication drill. 

pN random integers. 

Print the random factors . 

Keyboard input. 

Stop if entry is the letter S. 

Repeat if entry is right product, 

Prints if preceding branch fails. 

Branch to 3 for retry. 

Drill for pairs in range 1 to 12, 

Indicates that keyboard entry is 
awaited . 



Entry of letter S stops drill. 
Example of Character (H) input. 
Make Z an empty vector. 
D is the length of Z . 
Append character keyboard entry. 
Branch to 2 if length increased, 
(entry was not empty) . 
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Q+ENTERTEXT 
THIS IS ALL 
CHARACTER INPUT 

Q 
THIS IS ALL CHARACTER INPUT 
tf«-5 
'NOTE: i ' ;//; ' IS ' ; \N 

NOTE: xb IS 1 2 3 4 5 

P+2 3 5 7 
pP 



OH MY' 



PT 
P,P 



23572357 

T,T 
OH MYOH MI 

T,P 
DOMAIN ERROR 

T,P 

A 

AH-2 3p2 3 5 7 11 13 
M 

3 5 
11 13 
2 4pT 



2 

7 



OH M 
YOH 



bpM 
5 7 

5 7 

P+,M 
PC3] 



11 13 
11 13 



2 5 

2 3 

13 

3 

2 3 



PCI 3 5] 

11 

PCi3] 

5 

P[pP] 

Mil ;2] 

W[l;3 
5 



Keyboard 

entries. 
Empty input to terminate, 
Display Q. 



Mixed output statement, 

RECTANGULAR ARRAYS 
Dimension of P. 
Character vector. 

Catenation. 



Characters cannot be catenated 
with numbers . 

Reshape to produce a 2x3 matrix. 



A 2x4 matrix of characters. 

A matrix reshaped to a vector. 
Elements in row-major order. 

Indexing (third element of P) . 

A vector index . 

The first three elements of P. 

Last element of P. 

Element in row 1 , column 2 of M, 

Row 1 of M. 
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BCE 

GKM 

EC 
EC 



15 
7 



5 2 
5 3 

5 

WAS 1 
7 



Mil 1;3 2] 
3 
3 

A+'ABCDEFGHIJKLMNOPQ' 
. ALM1 



ALMll 1;3 2]] 

M[l;]«-15 3 12 
// 

3 12 
11 13 
G«-3 1 5 2 4 6 

11 3 7 13 

QIQ1 

4 12 6 

PC3] 

) ORIGIN 

P[3] 



P[0 1 2.3 
2 3 5 

i5 
12 3 4 

) ORIGIN 1 
WAS 

i5 
12 3 4 5 



Rows 1 and 1 , columns 3 2 . 



The alphabet to Q. 
A matrix index produces a matrix 
result. 



Respecifying the first row of M. 

A permutation vector. 
Permutation of P. 

A new permutation. 

Present index origin is 1 . 

Set index origin to 0. 

First three elements of P. 

Result of index generator begins 
at origin. 



F«-?3p9 
M+?3 3p9 
N<-?3 3p9 
V 
1 7 



FUNCTIONS ON ARRAYS 

Vector of 3 random integers (1-9). 
Random 3 by 3 matrix. 
Random 3 by 3 matrix. 
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M 
9 4 
8 1 
5 7 

N 
4 1 

7 6 

8 5 
M+JT 
13 
15 
13 
M[N 

9 4 
8 6 
8 7 

M<N 

1 
110 

+ /7 



7 
5 

1 

1 
4 
9 

8 

9 

10 

7 
5 
9 



5 

7 

12 



10 

14 
13 
20 
20 
9 



x/V 

t/[l]« 
22 12 

+ /[2]/>i 
14 13 

t/M 
14 13 

r//i 

8 7 

JOl .5 

+ /(1 2oJO*2 



O/l 2,X 
0.07067822453 

I«-o/0 2, J 

y 

0.9974949866 

Y=loX 
1 

A/+ . x/i/ 
79 123 81 

4 6 8 4 5 8 

84 95 66 

M+ . <N 
111 
111 
2 3 2 



Sum (element-by-element) . 

Maximum. 

Comparison. 

Sum-reduction of V. 
Product-reduction. 

Sum over first coordinate of M 

(down columns) . 
Sum over second coordinate of M 

(over rows) . 
Sum over last coordinate. 

Maximum over last coordinate. 

Sin squared plus Cos squared. 
Sin (Cos X) . 

(1-(C0S J)*2)*.5 

An identity. 

Ordinary matrix (+.x inner) 
product. 

An inner product. 
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A/t 


.xV 








il 


25 

7 


56 








! 1 


7 


.M5 








2 


4 


6 




8 


10 


1 


2 


3 




4 


5 


7 


11 


21 
.<i9 




28 


35 


1 


1 1 


1 1 


1 


1 


1 


1. 1 


1 1 


1 1 


1 


1 


1 







Vo . 





1 


1 


1 


14 


18 


8 








10 


16 


2 








2 


10 


14 








7 


9 


4 








5 


8 


1 








1 


5 


7 
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63 


28 








35 


56 


7 








7 


35 


49 









+ . x inner product with vector 
right argument. 



Outer product (times) . 



Outer product. 



An outer product of rank 3. 



A blank line between planes 



e-*-?10p5 
Q 
14 3 4 5 4 

+/[l]G».=i5 
2 2 14 1 

2 ltyi/ 
7 5 1 
9 8 5 
4 17 

7 5 1 
9 8 5 
4 17 

2 7 ' f -2 3 4pi24 

y 

12 3 4 

5 6 7 8 

9 10 11 12 



MIXED FUNCTIONS 

A random 10 element vector 
(range 1 to 5) . 

Ith element of result in number 
of occurrences of the value 
I in Q. 

Ordinary transpose of M. 



Ordinary transpose of M (monadic), 



An array of rank 3. 



13 
17 

21 



14 
18 
22 



15 
19 
23 



16 
20 
24 
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3 1 

1 13 

2 14 

3 15 

4 16 



2<S)T 



Transpose of T (dimension of 
result is 3 4 2) . 



5 17 

6 18 

7 19 

8 20 



9 21 

10 22 

11 23 

12 24 

1 1<S?M 
8 7 

1 1 2>S)T 
12 3 4 

17 18 19 2 

X+o(0, i5)t6 

) DIGITS 4 



IMS 10 

$1 2 

.00020 
5.0002~1 
8.6602~1 

1 .00 020 
8.6602 - ! 
5.0002~1 

Q 



Diagonal of M. 

Diagonal section in first two 
coordinates of T. 



Set number of output digits 
to 4. 



3°.oa: 
1. 00020 
8.6602~1 
5. 02" 1 
1.7442~16 
'5.0002 1 
'8.6602~1 



.00020 
5. 77 42"! 
1.7 3 220 
5.734215 
'1 .73220 
'5.7742~1 



Table of sines, cosines, and 
tangents in intervals of 
30 degrees . 



7 
5 
1 

9 
8 
5 

9 
1 
1 



3 4 5 4 

4 2 14 
~3<j>4 

2 14 3 

1 2<J>[1]A/ 

8 7 
5 4 

9 1 
~2$l2]M 

4 7 



4 
4 
4 



Rotate to left by 3 places. 

Rotate to right by 3 places. 

Rotate columns by different 
amounts . 



Rotation of rows all by 2 to 
right. 



1 
7 

4 
5 
5 



5 
1 
2 
7 
8 
7 



3 4>Af 



4>Q 
1 



Rotation of rows, 



Reversal of Q, 
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<Kl]A/ 


1 


5 7 


5 


8 1 


7 


9 4 




()>Af 


4 


9 7 


1 


8 5 


7 


5 1 




£/«-<2>4 




£/ 





10 




Z//« 


5 






(~U)/Q 


1 4 


3 4 i+ 2 1 




+ /*//# 


5 






1 l/[i]Af 


7 


9 4 


1 


5 7 




1 1/M 


7 


4 


5 


1 


1 


7 




( ,M>5)/ ,M 


7 9 


8 7 




V+-1 10 1 




V\\3 


1 


2 3 




K\M 


7 


9 4 


5 


8 1 


1 


5 7 




V\'ABC 


4 B C 




1011 7 7 6 


1776 






8ll 7 7 6 


1022 






(4plO)Tl776 


1 7 


7 6 




(3plO)Tl776 


7 7 


6 




10 10T1776 


7 6 






10T1776 


6 






24 60 60X1 3 25 


3805 









Reversal of M along first 
coordinate . 



Reversal along last coordinate, 



Compression of Q by logical 

vector U. 
Compression by not U. 



Compression along first coor- 
dinate of M. 

Compression along last coordin- 
ate . 



,M is 7 9 4 5 8 115 7 

All elements of M which exceed 

5. 
Expansion of iota 3. 

Expansion of rows of M. 



Expansion of literal vector in- 
serts spaces. 
Base 10 value of vector 17 7 6 

Base 8 value of 1 7 7 6. 

4-digit base 1 representation 

of number 1 766 . 
3-digit base 10 representation 

of number 1766. 



Mixed base value of 1 3 25 
(time radix) . 
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24 60 60T3805 


1 3 


25 




211 110 


22 






M 


7 


9 4 


5 


8 1 


1 


5 7 




) ORIGIN 


WAS 1 






Af[2;0] 


1 






( ,M)[(p^)T2,0] 


1 






) ORIGIN 1 


WAS 






P 


2 3 


5 7 11 13 




Pi7 


4 






Pi6 


7 






Pi4 5 6 7 


7 3 


7 4 




Q<-5 13 2 4 




R+QwpQ 




R 


2 4 


3 5 1 




QLRl 


1 2 


3 4 5 




>1«- * ABCDEFGHIJKLMNOPQ ' 




4«-A s 'RSTUVWXYZ' 




/4 


ABCDEFGHIJKLMNOPQRSTUVWXYZ 




Ai "C" 


3 






J+A\ 'CAT 1 




J 


3 1 


20 




4[<73 


o^T 






A/-*-3 5p' THREESHORTWORDS* 




M 


TtfPtftf 




SfltfPT 




J/OPPS 





Representation of number 3805 

in time radix . 
Base 2 value. 



Indexing of matrix in 0-origin. 
Note relation to indexing of 
ravel of M. 

Res tore 1 -origin . 



Index of 7 in vector P. 
7 is 4th element of P. 
6 does not occur in P, hence 
result is 1+pP. 



A permutation vector. 
R is the permutation inverse 
to Q. 



A is the alphabet. 

Rank of letter C in alphabet is 
3. 



A matrix of characters. 
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J+A\M 

J 
20 8 18 5 5 

19 8 15 18 20 

23 15 18 4 19 

AMI 

THREE 
SHORT 
WORDS 

3?5 
5 12 

6?5 
DOMAIN ERROR 

6?5 

A 

X«-8?8 

X 
4-6725183 

IX 
64815237 

12345678 

87654321 

U+A e ' tf CW 15 Tffff TIMS' » 
1 01 ' [1+Z7] 

00001001100011100011001000 

EHIMNOSTW 

(\8)e3 7 5 
00101010 



Ranking of M produces a matrix, 



Indexing by a matrix produces 
a matrix. 



Random choice of 3 out of 5 
without replacement. 



A random permutation vector. 

Grading of X. 

Arrange in ascending order. 

Arrange in descending order. 

Membership. 
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